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DISCLAIMER 



Although each program has been tested by its contributor, no 
warranty, express or implied, is made by the contributor or 
1620 USERS Group, as to the accuracy and functioning of the 
program and related program material, nor shall the fact of 
distribution constitute any such warranty, and no responsibility 
is assumed by the contributor or 1620 USERS Group, in con- 
nection therewith. 



1620 USERS GROUP PROGRAM REVIEW AND EVALUATION 
(fill out in typewriter or pencil, do not use ink) 

Program No. Date 

Program Name: 

1. Does the abstract adequately describe what the program is and what Yes No_ 

it does? 

Comment 

2. Does the program do what the abstract says ? Yes No_ 

' Commen t 

3. Is the Description clear, understandable, and adequate? Yes No,. 

Commen t 

4. Are the Operating Instructions understandable and in sufficient detail? Yes No_ 

Comment _____________________»___»__»____^ 

Are the Sense Switch options adequately described (if applicable)? Yes No^ 

Are the mnemonic labels identified or sufficiently understandable? Yes No_ 

Commen t 

5. Does the source program compile satisfactorily (if applicable)? Yes No_ 

Comment • 

6. Does the object program run satisfactorily? Yes No m 

Commen t 

7. Number of test cases run . Are any restrictions as to data, 

size, range, etc. covered adequately in description? Yes No^ 

C ommen t 

8. Does the Program Meet the minimal standards of the 1620 Users 

Group? Yes No_ 

C omment 

9. Were all necessary parts of the program received? Yes No_ 

Commen t 

10. Please list on the back any suggestions to improve the usefulness of the program. 
These will be passed onto the author for his consideration. 

Please return to: Your Name 



Mr. Richard L. Pratt Company 
Data Corporation 

7500 Old Xenia Pike Address 
Dayton, Ohio 45432 



User Group Code 



THIS REVIEW FORM IS PART OF THE 1620 USER GROUP ORGANIZATION'S PROGRAM 
REVIEW AND EVALUATION PROCEDURE. NONMEMBERS ARE CORDIALLY INVITED 
TO PARTICIPATE IN THIS EVALUATION. 
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CAST -Cross and Simple Tabulation Program 



Author : 

Howard Givner 

Office of Testing and Research 
Brooklyn College 
Bedford Avenue & Avenue H 
Brooklyn 10, N.Y. 11210 
User # 1026 



Modifications or revisions to this program, as they occur, 
will be announced in the appropriate Catalog of Programs 
for IBM Data Processing Systems. When such an announce- 
ment occurs, users should order a complete new program 
from the Program Information Department. 



DECK KEY 



1. Squished machine language object deck 

2. Sample problem data and header cards 

(a) The third card is for jobs 1 and 2 

(b) The second card from the end is for job 3 

3. Output for Sample Problem 

LISTINGS 

SPS Source Deck 
Squished Object Deck 
Sample Problem 
Sample Output 



ABSTRACT 



TITLE Cross and Simple Tabulation Program (C.A.S.T.) 

AUTHOR Howard Givner 

Office of Testing & Research 
Brooklyn College 
Bedford Ave. & Ave. H 
Brook&yn, New York 11210 

DATE March 6,1964 USERS# 1026 

DESCRIPTION. 

This program is designed to tabulate punch-card coded responses 
that are numerical (0-9), or consist of a single zone punch by 
itself (& or -), or are blankj for up to 200 items. Responses 
for a individual can be on more than one card if necessary. The 
number of response values and individuals to be counted is limited 
by core size and the numberof tabulations to be done in one pass. 
Format cards entered prior to the data provide for flexible data 
preparation. One control item may be cross-tabulated with all 
other items with one pass of the data. No direct divide, indirect 
addressing, or special instructions are required. Coding is in 
SPS. Fortran with Format input-output routines are used, with 
slight modifications. 
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CROSS - TABULATION 
Operation: LOAD program deck and put back in drawer. 

Input: (1) Format Card(s) 

(2) Parameter Card 

(3) Header Card(s) 
(14.) Data Cards 

(5) Trailer Card(s) — optional to allow stacking 
For detailed description of input see the pages which follow. 
Switch Settings: 

ON OFF 
switch '. , 1 interrupt output run 

switch 2 card output typewriter output 

switch 3 not interrogated not interrogated 

switch q. stacked wmx input halt after one job 

If switch 1 was used to interrupt job, several options are 
available : 

INSERT i4.9083.OO to zero counters and restart job. 
INSEBT i\S)10^l6 to resume output. 

INSERT 490958^ to read in more data to be tabulated in addition. 
After inserting, push release and start (RELEASE-START). 

Messages : 

FORM means format card is coded incorrectly, or the 
requirements for storing the specifications exceeds alloted area. 
Push START to reread. 

ERROR F7 means data was non-numerical, it is treated as blank. 

OVERLAP means the job requires more storage ■ than is 
available (in a I4.OK machine). 

STOP means the operator turned on switch 1. 

To retrieve BLANK cards form OUTPUT, sort on column 9 or 

(1) clear memory to zeros (160000600000) 

(2) place output in punch hopper 

(3) set switch to SELECT, NON-STOP on card punch 
(£) INSERT 3910O01OOl|.OOl4.9, push RELEASE and START 
(5) start punch and punched cards will be selected 

from blanks. 
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FORMAT CARDS 



Format cards give the program information about where the 
data is to be found on the data cards and the number of cards 
necessary to contain a set of items. 

Only the following characters are valid in a format card: 
/ C012314.5678 9 IX 



Specification Storage 

Code Requirement Meaning 



nX 7 skip n columns of input 

n/ £n read n additional cards 

before extracting data 
nlw 5n store n w-digit integers 

1 w. 9 



In all cases, 1 n 99. If n»l, it may be omitted. 

A n C w on the Format Card means that there are more 
specifications on the card following. 

Blanks may appear anywhere on the Format Card to increase 
readability. 

The total storage requirement for format specifications 
may not exceed 1995 ♦ 

NOTE: By the judicious use of slashes as format specifications 
it is possible to do a tabulation of a sample of all the data 
available without actually sorting out a sample by hand. 
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PARAMETER CARD 

This card must contain in columns 1-10 the values for 
each of the following in the order stated. 

col . . „ 

1-3 number of items, including control Item if any. 

jj-6 number of the control item or zero if no control item. 

7 mode of data: 0=numerical onljr; 1*11,12, and 0-9- 

8 tally output option. 1 , 

9 row percents output option. \ }l=output desired. 

10 column percents output option J *-0=no output desired. 



HEADER CARD(s) 

These cards should be prepared with exactly the same 
format as the data cards which they will precede. In each 
data field to be processed whould be punched the maximum value 
attainable for each item, (blank <12 <1 . . .9 *10 <etc. ) 



TRAILER CARD(s) 

A trailer is used to separate jobs when they are stacked. 
It should have an 028 multiple punch in the first column of 
the first field to be processed and be blank elsewhere. 



DATA RESTRICTIONS 

(1) Numerical data fields must be unsigned. 

(2) Only 6000 counters positions are provided for in . 
the I4DK version. The number of counters needed is equal to 
(C+A)(B-hnC) where ^— s 

n=number of items. » , V J 

A=maximum value of control item or zero if no control is used**** 
B=sum of maximum values of all items except control item. V* ✓ S^J 
02 for numerical data and \ for data with 11 and 12 punches*-*"*" 



(3) Blanks will be processed and tabiklated separately. 
(Ij.) The number of items must not exceed 200. 

(5) This program may be run ona 20K machine without 
modification. 
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OUTPUT DESCRIPTION 

The user of this program must provide labels for the output 
by using titles related to the meaning of the codes on the input data 
cards. As a guide to assist in labelling and sorting the output, each 
line of output contains a 3-number prefix. 

The first of the three numbers indicates which input code is 
the source of information for the table values on that line. 

-h indicates a total for all codes and blank responses 

-3 indicates blank or alphabetic responses 

-2 indieates a + response 

-1 indicates a - response 

IF DATA CONTAINS ZONE PUNCHES 

-2 indicates a total for all codes and blank responses 
-1 indicates a total for blank or alphabetic responses 
IF DATA IS NUMERICAL ONLY 

In all cases is for responses, 1 is for 1, 2 for 2, etc. 

The second number indicates which item is the source of information 
for the table value on that line. 

The third number is a line number (starting with zero and going 
up to nine, then back to zero again) and is used in the cases where the 
number of response codes is more than 13, in which case the tabulations 
for the first 13 codes (blank, +,-,0 to 9, or blank, to 11) will be on 
the first line, tabulations for the next 13 codes (10 to 22, or 12 to 24) 
will be in the next line, et cetera. 

The first line of output for each job contains the number of 
cases processed, and the number of the item which was crossed with all 
other items (columns h to 6 on the header card.) 

SAMPLE JOBS 

The data shown on page 6 was abstracted from data obtained in a 
survey of college students in which 31 questions were asked. The responses 
were then coded and punched onto cards, each response code being punched 
in the column whose number is the same as the number of the question for 
which it is the response code. Three of the items Q.8, Q.20, and Q.24 
were chosen to be processed as a sample of what this program does. 
These questions and their codes are presented here. 

Q. 8 Sex? male(+) female(-) 

Q.20 Class? freshman(l) sophomore(2) junior(3) seniorW 

Q.2U Soc. Org.? none(blank) fraternity or sorority(l) house plan(2) 

Page 7 shows how the output obtained by processing the data 
shown on page 6 should be labelled. 

Some inferences that may be made from the output are indicated 
below. Note that there is an assumed decimal p± point in the output of 
percentages, i.e., 1000 means 100.0? and 333 means 33.3? 

10% of the men responding are freshmen. 
25? of the freshmen responding are men. 
37 people responded. 20 were men. 

None of the 8 freshmen belongs to a social organization. PAGE 5 
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SAMPLE DATA FOR CROSS-TABULATION PROGRAM 



7x ii ux ii 3x ii -for Awtc<tr<J -fcrr j t>\> 1 (tod i o |> Z 

0030011111 JOB 1 PARAMETER CARD J - 1 

9999999-99999999999499929999999 HEADER CARD 

10-5 840+778143-5 820479-1-02 5624 
-071284+67584796245376110-54 4 
1 201+-84734940-4461214648762 
42-0258+786542021451205 2-14875 
321-024+456223-21322-021775 745 
1543201-645 20145261334212546767 
1545702-0251620162 54402126152 01 
715-620+492079564214-30 23465+1 
18-5284+5-5 6580326491+ 906-254 
4376254-650-62554671782 9653402 
4329586-375320162941705 9154265 
1-00555+7 4220632 2314 2415200- 

154079+2-08745 31542 26140-213 
-0132+3+34012-026452201 6-31+23 
7988495-930+-362+0+2+03 11012-94 

4 487-5 8 2 - 32 01 031320 
484372 — 6104526504345 32101695 37 
45152 04-6251026452 6210418 251+04 
0620487+953495815263598 01 — + 8 
1 2-3 10-+0 1320-3 11 2-30 13 1-01 3 134 
4407765-23611+40-0+1+1+ 326-660 
7958496-622010-32+31626 7058237 
12-3102+6-4645-61511784 3-47182 
10-3876+32432157565210-12184673 
1111112+12-0-+ 7445122-001623 
-01 320-+3 1320-3469 130-9 1-900 133 
1349752+049208895642325 1467844 
+13-048+79858 9738924 4 35820-+ 
7751481+3-0491029772432 +10-+++ 
6131402-3134026447+21302-016947 
18 76895-61+2 3-0261+3432 2 95 3 7497 
10-4673+58437592+3-2879 455 — 32 
4076928-72-082267521320 -976735 
4626432-8-04627335912-0 1647329 
0164325 — +03291643240+226154732 
1926732 5-013284026 251 0236472 
434+263 05045261046 274 162843+ 



0030001100 JOB 2 PARAMETER CARD 



19 x ii 3x u -foYj^ot cW for ')(>\> 3 



0020010100 JOB 3 PARAMETER CARD 



a 



a 
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OUTPUT FOR SAMPLE JOB 1 (CRo5A.T/)B> 
37 CARDS PROCESSED. 
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JOB 2 tS*Mrt.e r/?BJ 




37 CARD 




ESSED* 


+- 








1 * 3 U 






-4 
-4 


1- u 

2- 




2 


20 



..... 15 







8 10 8 9 









3-0 




18 


- o 





- 


14 5 












UUIKUI 


ran mirLc 


JOB 3 






37 


















Move 




H-r. 






-1 


2-0 
2-0 




18 
2 


u 




14 










#2V \/s. Qio 




1 


2-0- 
2-0 





8 


-o- 




- 




TJ ■ 



(') 






2 
3 


2-0 
2-0 




5 
1 






4 

5 


I 

2 


sow M 

J"«M/j"(7« (1) 







a 



340000000 102 3 7000 8 100 500 39000 8 100 10026 00086000664900068 00 000M9000000360000000 5 00 
CR0SS-TABULATI0NZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZ2ZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZ 
360024000 50Z 260004700054 16000 54-000 11 1000 54-00003 1-0 139-00 1045000 12002404900 2420 
00 160003 5-0 1002600090002 99 170006000J40-39360000000 50049000000 12 3456789 12 3456 789- 
360007200 5001500 300000004900108000000000000000000000000000000000000000000000000 9 
410002401200160003 5-0294490000000000360000000 5 003600 301005 003600 37600 50049000000 
3600220005002600030002992500000-02941200030-00011200035-0001140003 5-021947000240 
12 3456789 12 3456789-2 3456789- J3456789-JK45678 9- JKL56789- JKLM6789- JKLMN789-JKLMN08 
LMNO89-JKLMNOP9-JKLMNOPQZ0000000000 00000O0C0OO00 0000000C00000000O000000000C0000 
ZZ00000037080 5 100 500260 13 14004073 10 82 1000 536 150 103 100000 1600 582-008 11 60008 1-0474 
-1 140 80 5 1 000-047005400 1 2 003 1080 5008 052450048 0080 51 490 13920-0-Z 14080 5 1000P0 1-0 5 52 
50103100000470063601300250000008051 1100 582-00011400582-00834600756011004900-0627 
50400000 14080 5 1000M946008 160 1200 140 805 10000746009240 1200 140805 1000K 1460 10 32-070 2 
12001 40 8051 OOOM3470075 60 1200370805100500 49 00432000 00 34000000010239007830010-0778 
48465659540Z 1600498-0 540490040800 000160 1 319R 00 0-16 0128 3-00 05 160049 8-0864490-08 54 
5040000014080 5 1000P047007560 1300250 131708051 1501031000014901092000001601319-0930 
-01601283-00021101314-00051401314-38644600756011002601002013141600000-42641-1008 
501031000004901080000001601283-00051601319-41361501031000014901092000001101-1083 
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-00001201329000-1460127201100250103100 5391600498-0 540 31080 50080524900456000-1389 
4500756010311101314-000 51401314-386446007 56011002601458013141600000-4076420-1466 
131 19440J000 1600060-0000 141 19440-000460 17 160 1200141 19350-000460171 60 1200 160-1550 
1578-00 57 160 1590-00961100000000-12 2 00000 1193 5460 15 720 1300 260 16 2601 5 78 12 0000-16 2 5 
-126016500159021000001193526016 7401590 3300000000001101578-0 0011101590-00014-1704 
301572015 90 3 2000 5700000420000000000470 78 880130045 043240643 3110 72 75-00021601-1779 
847-805226018230727526018350727 52101847000002101847000003108052000004906364-18 54 
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.03030 BD P1.SW2 

03040N3 TDM 16,3 

03050 BD P1.SW3 

03060 B STOP-24 

03070P1 TFM 12,1,8 

03080P5 C I2,NTROL 

_Q3090 BE P51 

03100 C 12, ITEMS 

03110 BH P51+24 

03120 BC1 STOP 

03130 BNF *+72,MODE 

03140 TDM 05365, »,T2=0 FOR NO NUMERICAL OUTPUT 

-.03150 BC2 *+36 

03160 BTM WATY,F6-5 

03170 B *+24 

03180 BTM WACD,F6-5 

03190 TFM II, ,8 

03200P6 MM 11,4,10 

03210 _ SF 95 

03220 TFM *+35,KAY 

_03230 A *+23,99 

03240 TF KAY 

032 50 TFM I 3 , ,8 

03260 TFM 14,-1,8 

03270P3 AM 14,1,8 

03280 BC2 *+36 

03290 BTM WATY , F4-5 

03300 B *+24 

03310 BTM WACD ,F4-5 

03320 TF TA,I1 

.03330 S TA,INC 

03340 BTM WCTA 

03350 TF TA,I2 

03360 BTM WCTA 

03370 BTM WOI4 

03380 TDM J 

P.3390 TFM I 5,, 8 

0340OP2 AM 15,1,8 

03410 AM 13,1,8 

03420 CM 15,13,8 

03430 BNE *+24 

03440 TDM J, 1,11 

_03_450 MM 12,4,10 _ _ 

03460 SF 95 

03470 TFM *+35 , I NDEX-4 

03480 A *+23,99 

03490 TF TA 

03500 CF TA-3 

.03510 TDM TA-4,,11 

03520 A TA,I3 

03530 TF LAP,TA 

03540 M II, IS . „ 

1Q 



03550 


5F 


95 


04140 


03560 


A 


TA , 99 


04150 
04160 


03570 


MM 


TA»4,10 


03580 


SF 


95 


04170 


03590 


TFM 


*+35 ,NCTS 


04180 


03600 


A 


*+23»99 


04190 


03610 


TF 


TA 


042O0 


03620 


CM 


16,2,10 


04210 


03630 


BL 


P4 


04220 


03 640 


CM 


1 1 » ,8 


J4230 


03650 


BNF 


*+36 


04240 


03660 


TF 


LAP,NCDS 


04250 


03670 


B 


P8 


04260 


.-03680 


CM 


16,2,10 


04270 


03690 


BE 


P9 


04280 


03700 


TF 


LAP, KAY 


04290 


037 10P8 


BTM 


DIV, ,10 


04300 


03720 


TF 


TA,FAC 


04310 


03730 


B 


P4 


04320 


03740P9 


MM 


LAP, 4, 10 


-.04330 


03750 


SF 


95 


04340 


03760 


TFM 


*+35 ,NCTS 


04350 


03770 


A 


*+23,99 


04360 


03780 


TF 


LAP 


04370 


03790 


B 


P8 


04380 


03800P4 _ 


MM 


12 ,4,10 


04390F2 


03810 


SF 


95 


04400 


03820 


TFM 


*+35 » KEY 


04410 


OJBil) 


A 


*+23,99 


04420 


03840 


C 


1 3 


04430 


03850 


BE 


*+72 


04440 


03860 


BD 


*+36 , J 


_ 04450 


03870 


BTM 


WCTA 


~ 04460 


03880 


g 


P2 


04470 


03890 


BTM 


COMPLT »TA 


04480 


-03900 


B 


P3 


04490 


03910 


BTM 


COMPLT, TA 


04500 


03920 


AM 


11,1,8 


04510 


03930 


C 


11, MAX 


04520 


03940 


BNH 


P6 


04530 


03950P51 


AM 


12,1,8 


04540 


03960 


B 


P5 


04550 


03970 


CM 


16,2,10 


04560 


.0398.0 


BE 


N3 


.0.4570 


03990 


BL 


N2 


04580 


04000 


BC4 


START+12 


04590F4 


04010 


B 


START 


04600 



04020STOP 
04030 



RCTY 
WATY*+15 



04040 


H 


62635 


,65700 


04050 


DC 


1 


»-,* 




04060 


B 


* 


-36 




04070F3 


DSA 


LTPAR 


,-90300 


04080F5 


DSA 


LTPAR 


.HTYPE 


04090 


DC 


2 


,07 




04100 


DC 


2 


,56, 





04 1*1 6" 


DC 


2 


,65, 


V 


04120 


DC 


2 


,45, 


E 


04130 


DC 


2 


,59, 


R 



-90 100, -90 100, -90100, R TP AR 
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04610 

04620 

04630 

04640 

04650 

04660 

04670 

04680 

0469 0F6 

04700* 

0471016 

04720J 



DC 

DC 

DC 

DSA 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DSA 

DSA 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DSA 

DSA 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DSA 

DSA 

DSA 

DC 
DS 



2 


, 53 , , 


L 


2 


,41 , » 


A 


2 


,57, , 


P 




9050C 


, 


2 


,19 




2 


,00, , 




2 


,43, , 


C 


2 


,56, , 





2 


,64, , 


U 


2 


,55, , 


N 


2 


,63, , 


T 


2 


,45 , , 


E 


2 


,59, , 


R 


2 


,00, , 




2 


,57,, 


P 


2 


,56, , 





2 


,62, , 


S 


2 


,49, , 


I 


2 


♦ 63, , 


T 


2 


,49, , 


I 


2 


,56, , 





2 


,55, , 


N 


2 


,62, , 


S 


2 


,03, , 




RTPAR 




LTPAR, 




2 


,17 




2 


,00, , 




2 


,43,, 


C 


2 


,41, , 


A 


2 


,59, , 


R 


2 


,44, , 


D 


2 


,62,, 


S 


2 


,00, , 




2 


,57, , 


P 


2 


,59,, 


R 


2 


,56, , 





2 


,43,, 


C 


2 


,45, , 


E 


2 


,62,, 


S 


2 


,62, , 


s 


2 


,45, , 


E 


2 


♦ 44, , 


D 


2 


,03, , 






91000 • 


LTPAR, 




2 


,06 




2 


,00, , 




2 


,00, , 




2 


,00, , 




2 


,00, , 




2 


,00, , 




2 


,00, , 





-90500,HTYPE 



FI5,FI5,FI5,FI5,FI5,FI5»FI5,FI5,FI5,FI5 
FI5,FI5,FI5, RTPAR 
LTPAR, SLASH.RTPAR 
LIS'TING OF SYMBOL TABLE 
2,0 
1 



1& 



© 



a 



04730 I 


DS 


4 


04740 1 1 


DS 


4 


04750 I 2 


OS 


4 


047601 3 


DS 


4 


04770 14 


DS 


4 


0478015 


DS 


4 


04790IN 


DS 


4 


04800IS 


DS 


4 


04~810IT 


DS 


5 


04820MODF 


DS 


4 


04830SW1 


DS 


4 


04840SW2 


DS 


4 


04850SW3 


DS 


4 


04860ITEMS 


DS 


4 


04870NTROL 


DS 


4 


04880MAX 


DS 


4 


04890LAP 


DS 


5 


04900NCDS 


DS 


4 


049 IOTA 


DS 


5 


04920KEY 


DSB 


4 


04930INDEX 


DSB 


4 


04940NAY 


DSB 


4 


04950KAY 


DSB 


4 


04960NCTS 


DSB 


4 


04970FAC 


DS 


, 


04980WC 


DS 


* 



04990COMPLTDS 
05000WATY DS 
05010WACD DS 
05020RACD DS 
05030HTYPE DS 
05040R TPAR DS 
05050LTPAR DS 
05060SLASH DS 
05070FI5 DS 
05080DEND DS 



,04940, 
,04796, 
,04748, 
,04512, 
,04264, 
,04076, 
,04044. 
,04136, 
,-90500 



FIXED AND FLOATING ACCUMULATOR 
NOT LAST ITEM IN LIST 
LAST ITEM IN LIST 
PRINT ON THE TYPEWRITER 
PUNCH A CARD 
READ A CARD 

HANDLE ALPHABETIC DATA 

START A, NEW RECORD, GO TO LAST LTPAR 
STORE LEFT PARENTHESIS 
START A NEW RECORD 



05090 



DEND START 



00408 


READF 


00456 


INIT 


00492 


00576 


MC 


00636 


TYPES 


00756- 


00924 


XTYPE 


01031 


X 


01032 


01308 


PLACE 


01320 


COUNT 


01392 


01572 


El 


01716 


DE 


01740 


08300 


START 


08600 


Dl 


08731 


09044 


D2 


09440 


D7 


09536 


10160 


D51 


10196 


P 


10304 


10376 


P5 


10520 


P6 


10604 


11168 


P9 


11240 


P4 


11420 


11596 


. F5 


11677 


F2 


. H743 


11865 


J 


11869 


I 


11873 


11885 


14 


11889 


15 


11893 


11906 


MODE 


11910 


SW1 


11914 


11926 


• NTROL 


11930 


MAX 


11935 


11948 


KEY 


12752 


INDEX 


13556 


00060 


FAC 


04992 


WC 


04940 


04512 


RACD 


04264 


HTYPE 


04076 


90500 


FI5 


38776 


DEND 





GO 


00504 


SHIFT 


00540 


CNO 


*FERROR 


00780 


HALT 


00816 


I TYPE 


SS 


01080 


♦FORM IT 


01272 


♦INCREM 


ENDF 


08051 


Q 


01476 


DIV 


XSPEC 


01864 


Fl 


03864 


EF 


MINZ 


08755 


INC 


08792 


Bl 


D3 


09608 


D4 


09776 


D5 


N2 


10328 


N3 


10364 


PI 


P3 


10760 


P2 


11132 


P8 


P51 


11504 


STOP 


11556 


F3 


F4 


11852 


F6 


11864 


.16 


11 


11877 


12 


11881 


I 3 


IN 


11897 


IS 


11902 


I T 


SW2 


11918 


SW3 


11922 


ITEMS 


LAP 


11939 


NCDS 


11944 


TA 


NAY 


14360 


KAY 


14780 


NCTS 


♦COMPLT 


04796 


WAT Y 


04748 


WACD. 


RTPAR 


04044 


LTPAR 


04136 


SLASH 



1? 



a 



